

*** Syntax for analyses of time-series video data

*** Use data file 'Time-series-data-videos.dta' with this syntax



* Table 4

  gen neg = .
  replace neg = negativity
  
  xtset resp timesec
  quietly xtreg D.gslmc c.neg##c.timesecStorylog order L.gslmc female age income university if period==2 & local==0 , re 
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog order L.gslmc female age income university if wp_right2_dichox==0 & period==2 & local==0 , re 
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog order L.gslmc female age income university if wp_right2_dichox==1 & period==2 & local==0 , re 
  estimates store C
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.wp_right2 order L.gslmc female age income university if period==2 & local==0 , re 
  estimates store D
  esttab A B C D, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 

  
  
* Figure 4
  
  gen right2 = .
  replace right2= wp_right2
   
  xtset resp timesec
  replace neg = negativity
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="BR" & period==2 & local==0 , re 
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CA.e" & period==2 & local==0 , re  
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CA.f" & period==2 & local==0 , re  
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CH" & period==2 & local==0 , re 
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CN" & period==2 & local==0 , re  
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="DK" & period==2 & local==0 , re  
  estimates store F 
  esttab A B C, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab D E F, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 

  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="FR" & period==2 & local==0 , re 
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="GH" & period==2 & local==0 , re  
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IN" & period==2 & local==0 , re  
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.j" & period==2 & local==0 , re 
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.p" & period==2 & local==0 , re  
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IT" & period==2 & local==0 , re  
  estimates store F 
  esttab A B C, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab D E F, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="JP" & period==2 & local==0 , re 
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="NZ" & period==2 & local==0 , re  
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="RU" & period==2 & local==0 , re  
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SE" & period==2 & local==0 , re 
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SW" & period==2 & local==0 , re  
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="UK" & period==2 & local==0 , re  
  estimates store F 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="US" & period==2 & local==0 , re  
  estimates store G 
  esttab A B C D, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab E F G, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  
 

* Table A3 Row 3

  replace right2= wp_right2

  xtset resp timesec
  replace neg = negativity
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if period==2 & local==0 , re 
  estimates store G  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="BR" & period==2 & local==0 , re 
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CA.e" & period==2 & local==0 , re  
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CA.f" & period==2 & local==0 , re  
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CH" & period==2 & local==0 , re 
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CN" & period==2 & local==0 , re  
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="DK" & period==2 & local==0 , re  
  estimates store F 
  esttab G A B C, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab D E F, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 

  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="FR" & period==2 & local==0 , re 
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="GH" & period==2 & local==0 , re  
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IN" & period==2 & local==0 , re  
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.j" & period==2 & local==0 , re 
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.p" & period==2 & local==0 , re  
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IT" & period==2 & local==0 , re  
  estimates store F 
  esttab A B C, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab D E F, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="JP" & period==2 & local==0 , re 
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="NZ" & period==2 & local==0 , re  
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="RU" & period==2 & local==0 , re  
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SE" & period==2 & local==0 , re 
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SW" & period==2 & local==0 , re  
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="UK" & period==2 & local==0 , re  
  estimates store F 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="US" & period==2 & local==0 , re  
  estimates store G 
  esttab A B C D, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab E F G, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 

  
  xtset resp timesec
  replace neg = negativity
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if period==2 & local==1 , re 
  estimates store G  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="BR" & period==2 & local==1 , re 
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CA.e" & period==2 & local==1 , re  
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CA.f" & period==2 & local==1 , re  
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CH" & period==2 & local==1 , re 
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CN" & period==2 & local==1 , re  
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="DK" & period==2 & local==1 , re  
  estimates store F 
  esttab G A B C, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab D E F, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="FR" & period==2 & local==1 , re 
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="GH" & period==2 & local==1 , re  
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IN" & period==2 & local==1 , re  
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.j" & period==2 & local==1 , re 
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.p" & period==2 & local==1 , re  
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IT" & period==2 & local==1 , re  
  estimates store F 
  esttab A B C, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab D E F, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="JP" & period==2 & local==1 , re 
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="NZ" & period==2 & local==1 , re  
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="RU" & period==2 & local==1 , re  
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SE" & period==2 & local==1 , re 
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SW" & period==2 & local==1 , re  
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="UK" & period==2 & local==1 , re  
  estimates store F 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="US" & period==2 & local==1 , re  
  estimates store G 
  esttab A B C D, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab E F G, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  
  
 
* Table A6 Row 3

  replace right2= wp_right2
  xtset resp timesec
  replace neg = negativity
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if period==2 & local==0 , re 
  estimates store G  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="BR" & period==2 & local==0 , re 
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CA.e" & period==2 & local==0 , re  
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CA.f" & period==2 & local==0 , re  
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CH" & period==2 & local==0 , re 
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CN" & period==2 & local==0 , re  
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="DK" & period==2 & local==0 , re  
  estimates store F 
  esttab G A B C, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab D E F, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="FR" & period==2 & local==0 , re 
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="GH" & period==2 & local==0 , re  
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IN" & period==2 & local==0 , re  
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.j" & period==2 & local==0 , re 
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.p" & period==2 & local==0 , re  
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IT" & period==2 & local==0 , re  
  estimates store F 
  esttab A B C, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab D E F, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="JP" & period==2 & local==0 , re 
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="NZ" & period==2 & local==0 , re  
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="RU" & period==2 & local==0 , re  
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SE" & period==2 & local==0 , re 
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SW" & period==2 & local==0 , re  
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="UK" & period==2 & local==0 , re  
  estimates store F 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="US" & period==2 & local==0 , re  
  estimates store G 
  esttab A B C D, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab E F G, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  
  
  replace right2= wp_right2_dicho2
  xtset resp timesec
  replace neg = negativity
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if period==2 & local==0 , re 
  estimates store G  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="BR" & period==2 & local==0 , re 
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CA.e" & period==2 & local==0 , re  
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CA.f" & period==2 & local==0 , re  
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CH" & period==2 & local==0 , re 
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CN" & period==2 & local==0 , re  
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="DK" & period==2 & local==0 , re  
  estimates store F 
  esttab G A B C, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab D E F, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="FR" & period==2 & local==0 , re 
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="GH" & period==2 & local==0 , re  
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IN" & period==2 & local==0 , re  
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.j" & period==2 & local==0 , re 
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.p" & period==2 & local==0 , re  
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IT" & period==2 & local==0 , re  
  estimates store F 
  esttab A B C , cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab D E F , cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="JP" & period==2 & local==0 , re 
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="NZ" & period==2 & local==0 , re  
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="RU" & period==2 & local==0 , re  
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SE" & period==2 & local==0 , re 
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SW" & period==2 & local==0 , re  
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="UK" & period==2 & local==0 , re  
  estimates store F 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="US" & period==2 & local==0 , re  
  estimates store G 
  esttab A B C D, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab E F G, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
 
  
  replace right2= wp_right2_dichox
  xtset resp timesec
  replace neg = negativity
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if period==2 & local==0 , re 
  estimates store G  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="BR" & period==2 & local==0 , re 
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CA.e" & period==2 & local==0 , re  
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CA.f" & period==2 & local==0 , re  
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CH" & period==2 & local==0 , re 
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CN" & period==2 & local==0 , re  
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="DK" & period==2 & local==0 , re  
  estimates store F 
  esttab G A B C, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab D E F, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="FR" & period==2 & local==0 , re 
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="GH" & period==2 & local==0 , re  
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IN" & period==2 & local==0 , re  
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.j" & period==2 & local==0 , re 
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.p" & period==2 & local==0 , re  
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IT" & period==2 & local==0 , re  
  estimates store F 
  esttab A B C, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab D E F, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="JP" & period==2 & local==0 , re 
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="NZ" & period==2 & local==0 , re  
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="RU" & period==2 & local==0 , re  
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SE" & period==2 & local==0 , re 
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SW" & period==2 & local==0 , re  
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="UK" & period==2 & local==0 , re  
  estimates store F 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="US" & period==2 & local==0 , re  
  estimates store G 
  esttab A B C D, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab E F G, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
 
  
  replace right2= left_right2
  xtset resp timesec
  replace neg = negativity
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if period==2 & local==0 , re 
  estimates store G  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="BR" & period==2 & local==0 , re 
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CA.e" & period==2 & local==0 , re  
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CA.f" & period==2 & local==0 , re  
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CH" & period==2 & local==0 , re 
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CN" & period==2 & local==0 , re  
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="DK" & period==2 & local==0 , re  
  estimates store F 
  esttab G A B C, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab D E F, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="FR" & period==2 & local==0 , re 
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="GH" & period==2 & local==0 , re  
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IN" & period==2 & local==0 , re  
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.j" & period==2 & local==0 , re 
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.p" & period==2 & local==0 , re  
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IT" & period==2 & local==0 , re  
  estimates store F 
  esttab A B C, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab D E F, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="JP" & period==2 & local==0 , re 
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="NZ" & period==2 & local==0 , re  
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="RU" & period==2 & local==0 , re  
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SE" & period==2 & local==0 , re 
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SW" & period==2 & local==0 , re  
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="UK" & period==2 & local==0 , re  
  estimates store F 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="US" & period==2 & local==0 , re  
  estimates store G 
  esttab A B C D, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab E F G, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
 
  
  replace right2= left_right2_dichox
  xtset resp timesec
  replace neg = negativity
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if period==2 & local==0 , re 
  estimates store G  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="BR" & period==2 & local==0 , re 
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CA.e" & period==2 & local==0 , re  
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CA.f" & period==2 & local==0 , re  
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CH" & period==2 & local==0 , re 
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CN" & period==2 & local==0 , re  
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="DK" & period==2 & local==0 , re  
  estimates store F 
  esttab G A B C, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab D E F, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="FR" & period==2 & local==0 , re 
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="GH" & period==2 & local==0 , re  
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IN" & period==2 & local==0 , re  
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.j" & period==2 & local==0 , re 
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.p" & period==2 & local==0 , re  
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IT" & period==2 & local==0 , re  
  estimates store F 
  esttab A B C, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab D E F, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="JP" & period==2 & local==0 , re 
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="NZ" & period==2 & local==0 , re  
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="RU" & period==2 & local==0 , re  
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SE" & period==2 & local==0 , re 
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SW" & period==2 & local==0 , re  
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="UK" & period==2 & local==0 , re  
  estimates store F 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="US" & period==2 & local==0 , re  
  estimates store G 
  esttab A B C D, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab E F G, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
 
  
  replace right2= ideo_right2
  xtset resp timesec
  replace neg = negativity
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if period==2 & local==0 , re 
  estimates store G  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="BR" & period==2 & local==0 , re 
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CA.e" & period==2 & local==0 , re  
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CA.f" & period==2 & local==0 , re  
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CH" & period==2 & local==0 , re 
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CN" & period==2 & local==0 , re  
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="DK" & period==2 & local==0 , re  
  estimates store F 
  esttab G A B C, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab D E F, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="FR" & period==2 & local==0 , re 
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="GH" & period==2 & local==0 , re  
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IN" & period==2 & local==0 , re  
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.j" & period==2 & local==0 , re 
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.p" & period==2 & local==0 , re  
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IT" & period==2 & local==0 , re  
  estimates store F 
  esttab A B C, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab D E F, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="JP" & period==2 & local==0 , re 
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="NZ" & period==2 & local==0 , re  
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="RU" & period==2 & local==0 , re  
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SE" & period==2 & local==0 , re 
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SW" & period==2 & local==0 , re  
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="UK" & period==2 & local==0 , re  
  estimates store F 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="US" & period==2 & local==0 , re  
  estimates store G 
  esttab A B C D, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab E F G, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
 
  
  replace right2= ideo_right2_dichox
  xtset resp timesec
  replace neg = negativity
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if period==2 & local==0 , re 
  estimates store G  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="BR" & period==2 & local==0 , re 
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CA.e" & period==2 & local==0 , re  
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CA.f" & period==2 & local==0 , re  
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CH" & period==2 & local==0 , re 
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CN" & period==2 & local==0 , re  
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="DK" & period==2 & local==0 , re  
  estimates store F 
  esttab G A B C, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab D E F, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="FR" & period==2 & local==0 , re 
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="GH" & period==2 & local==0 , re  
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IN" & period==2 & local==0 , re  
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.j" & period==2 & local==0 , re 
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.p" & period==2 & local==0 , re  
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IT" & period==2 & local==0 , re  
  estimates store F 
  esttab A B C, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab D E F, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="JP" & period==2 & local==0 , re 
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="NZ" & period==2 & local==0 , re  
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="RU" & period==2 & local==0 , re  
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SE" & period==2 & local==0 , re 
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SW" & period==2 & local==0 , re  
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="UK" & period==2 & local==0 , re  
  estimates store F 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="US" & period==2 & local==0 , re  
  estimates store G 
  esttab A B C D, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab E F G, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
 

  
* Table A8 Row 3 
 
  replace right2= wp_right2  
  
  xtset resp timesec
  replace neg = negativity
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if period==2 & local==0 , re 
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if period==2 & local==0 & wp_right2_ext==1, re  
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if period==2 & local==0 & political_interest_dichox==1, re  
  estimates store C
  esttab A B C , cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 

  
  xtset resp timesec
  replace neg = negativity
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if period==2 & local==0 , re  
  estimates store G
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="BR" & period==2 & local==0 , re 
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CA.e" & period==2 & local==0 , re  
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CA.f" & period==2 & local==0 , re  
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CH" & period==2 & local==0 , re 
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CN" & period==2 & local==0 , re  
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="DK" & period==2 & local==0 , re  
  estimates store F 
  esttab G A B C, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab D E F, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="FR" & period==2 & local==0 , re 
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="GH" & period==2 & local==0 , re  
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IN" & period==2 & local==0 , re  
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.j" & period==2 & local==0 , re 
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.p" & period==2 & local==0 , re  
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IT" & period==2 & local==0 , re  
  estimates store F 
  esttab A B C, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab D E F, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="JP" & period==2 & local==0 , re 
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="NZ" & period==2 & local==0 , re  
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="RU" & period==2 & local==0 , re  
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SE" & period==2 & local==0 , re 
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SW" & period==2 & local==0 , re  
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="UK" & period==2 & local==0 , re  
  estimates store F 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="US" & period==2 & local==0 , re  
  estimates store G 
  esttab A B C D, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab E F G, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
    
	
  xtset resp timesec
  replace neg = negativity
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if period==2 & local==0 & wp_right2_ext==1, re  
  estimates store G  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="BR" & period==2 & local==0 & wp_right2_ext==1, re 
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CA.e" & period==2 & local==0 & wp_right2_ext==1, re  
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CA.f" & period==2 & local==0 & wp_right2_ext==1, re  
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CH" & period==2 & local==0 & wp_right2_ext==1, re 
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CN" & period==2 & local==0 & wp_right2_ext==1, re  
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="DK" & period==2 & local==0 & wp_right2_ext==1, re  
  estimates store F 
  esttab G A B C, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab D E F, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
    
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="FR" & period==2 & local==0 & wp_right2_ext==1, re 
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="GH" & period==2 & local==0 & wp_right2_ext==1, re  
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IN" & period==2 & local==0 & wp_right2_ext==1, re  
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.j" & period==2 & local==0 & wp_right2_ext==1, re 
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.p" & period==2 & local==0 & wp_right2_ext==1, re  
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IT" & period==2 & local==0 & wp_right2_ext==1, re  
  estimates store F 
  esttab A B C, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab D E F, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="JP" & period==2 & local==0 & wp_right2_ext==1, re 
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="NZ" & period==2 & local==0 & wp_right2_ext==1, re  
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="RU" & period==2 & local==0 & wp_right2_ext==1, re  
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SE" & period==2 & local==0 & wp_right2_ext==1, re 
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SW" & period==2 & local==0 & wp_right2_ext==1, re  
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="UK" & period==2 & local==0 & wp_right2_ext==1, re  
  estimates store F 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="US" & period==2 & local==0 & wp_right2_ext==1, re  
  estimates store G 
  esttab A B C D, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab E F G, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
 
  
  xtset resp timesec
  replace neg = negativity
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if period==2 & local==0 & political_interest_dichox==1, re  
  estimates store G  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="BR" & period==2 & local==0 & political_interest_dichox==1, re 
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CA.e" & period==2 & local==0 & political_interest_dichox==1, re  
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CA.f" & period==2 & local==0 & political_interest_dichox==1, re  
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CH" & period==2 & local==0 & political_interest_dichox==1, re 
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="CN" & period==2 & local==0 & political_interest_dichox==1, re  
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="DK" & period==2 & local==0 & political_interest_dichox==1, re  
  estimates store F 
  esttab G A B C , cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab D E F, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 

  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="FR" & period==2 & local==0 & political_interest_dichox==1, re 
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="GH" & period==2 & local==0 & political_interest_dichox==1, re  
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IN" & period==2 & local==0 & political_interest_dichox==1, re  
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.j" & period==2 & local==0 & political_interest_dichox==1, re 
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IS.p" & period==2 & local==0 & political_interest_dichox==1, re  
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="IT" & period==2 & local==0 & political_interest_dichox==1, re  
  estimates store F 
  esttab A B C, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab D E F, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="JP" & period==2 & local==0 & political_interest_dichox==1, re 
  estimates store A
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="NZ" & period==2 & local==0 & political_interest_dichox==1, re  
  estimates store B
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="RU" & period==2 & local==0 & political_interest_dichox==1, re  
  estimates store C  
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SE" & period==2 & local==0 & political_interest_dichox==1, re 
  estimates store D
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="SW" & period==2 & local==0 & political_interest_dichox==1, re  
  estimates store E
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="UK" & period==2 & local==0 & political_interest_dichox==1, re  
  estimates store F 
  quietly xtreg D.gslmc c.neg##c.timesecStorylog c.neg##c.right2 order L.gslmc female age income university if country2=="US" & period==2 & local==0 & political_interest_dichox==1, re  
  estimates store G 
  esttab A B C D, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
  esttab E F G, cells(b(star fmt(3)) se(par fmt(3))) nogaps stat(r2_w r2_b r2_o N N_g) 
 
  
  
  
      
